home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.mactech.com 2010
/
ftp.mactech.com.tar
/
ftp.mactech.com
/
thinkref
/
archive
/
THINKPascalUH2.1.sea
/
THINKPas Univ Hdr 2.1
/
Interfaces
/
CMAcceleration.p
< prev
next >
Wrap
Text File
|
1995-09-14
|
4KB
|
107 lines
{ Converted with MPW2TPas Tuesday, September 12, 1995 5:20:31 PM }
{}
{ File: CMAcceleration.p}
{ }
{ Contains: ColorSync 2.0 Acceleration Component Interfaces}
{ }
{ Version: Technology: ColorSync 2.0}
{ Package: Universal Interfaces 2.1 in “MPW Latest” on ETO #18}
{ }
{ Copyright: © 1984-1995 by Apple Computer, Inc.}
{ All rights reserved.}
{ }
{ Bugs?: If you find a problem with this file, use the Apple Bug Reporter}
{ stack. Include the file and version information (from above)}
{ in the problem description and send to:}
{ Internet: apple.bugs@applelink.apple.com}
{ AppleLink: APPLE.BUGS}
{ }
{}
unit CMAcceleration;
interface
{$IFC UNDEFINED __CMACCELERATION__}
{$SETC __CMACCELERATION__ := 1}
uses
ConditionalMacros, Types, Memory, Components, Quickdraw, Dialogs, Printing, CMICCProfile, CMApplication;
{ $PUSH}
{ $ALIGN MAC68K}
{ $LibExport+}
const
cmAccelerationInterfaceVersion = 1;
{–––––––––––––––––––––––––––––––––––––– Component Type}
cmAccelerationComponentType = 'csac';
{–––––––––––––––––––––––––––––––––––––– Required Component function selectors}
cmLoadTables = 0;
cmCalculateData = 1;
{–––––––––––––––––––––––––––––––––––––– table data for acceleration component}
type
CMAccelerationTableData = record
inputLutEntryCount: LONGINT; { count of entries for input lut for one dimension}
inputLutWordSize: LONGINT; { count of bits of each entry ( e.g. 16 for WORD )}
inputLut: Handle; { handle to input lut}
outputLutEntryCount: LONGINT; { count of entries for output lut for one dimension }
outputLutWordSize: LONGINT; { count of bits of each entry ( e.g. 8 for BYTE )}
outputLut: Handle; { handle to output lut}
colorLutInDim: LONGINT; { input dimension ( e.g. 3 for LAB ; 4 for CMYK )}
colorLutOutDim: LONGINT; { output dimension ( e.g. 3 for LAB ; 4 for CMYK )}
colorLutGridPoints: LONGINT; { count of gridpoints for color lut ( for one Dimension ) }
colorLutWordSize: LONGINT; { count of bits of each entry ( e.g. 8 for BYTE )}
colorLut: Handle; { handle to color lut}
inputColorSpace: CMBitmapColorSpace; { packing info for input}
outputColorSpace: CMBitmapColorSpace; { packing info for output}
userData: Ptr;
reserved1: LONGINT;
reserved2: LONGINT;
reserved3: LONGINT;
reserved4: LONGINT;
reserved5: LONGINT;
end;
CMAccelerationTableDataPtr = ^CMAccelerationTableData;
CMAccelerationTableDataHdl = ^CMAccelerationTableDataPtr;
{–––––––––––––––––––––––––––––––––––––– calc data for acceleration component}
CMAccelerationCalcData = record
pixelCount: LONGINT; { count of input pixels}
inputData: Ptr; { input array}
outputData: Ptr; { output array}
reserved1: LONGINT;
reserved2: LONGINT;
end;
CMAccelerationCalcDataPtr = ^CMAccelerationCalcData;
CMAccelerationCalcDataHdl = ^CMAccelerationCalcDataPtr;
{————————————————————————————————————————————————————————————————————————————————————————————————}
{ A c c e l e r a t i o n C o m p o n e n t I n t e r f a c e s}
{————————————————————————————————————————————————————————————————————————————————————————————————}
function CMAccelerationLoadTables (CMSession: ComponentInstance; tableData: CMAccelerationTableDataPtr): CMError;
{$IFC NOT GENERATINGCFM}
inline
$2F3C, $0004, $0000, $7000, $A82A;
{$ENDC}
function CMAccelerationCalculateData (CMSession: ComponentInstance; calcData: CMAccelerationCalcDataPtr): CMError;
{$IFC NOT GENERATINGCFM}
inline
$2F3C, $0004, $0001, $7000, $A82A;
{$ENDC}
{ $ALIGN RESET}
{ $POP}
{$ENDC}
{__CMACCELERATION__}
implementation
end.